?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Removing an old, cherished, yet pointless caveat "This documentation is
[supercollider.git] / Help / Streams-Patterns-Events / A Practical Guide / PG_Cookbook06_Phrase_Network.html
blobd7bf5b874c1b8de460a6963d299115a51046ebb7
1 <!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
2 <html>
3 <head>
4 <meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
5 <meta http-equiv="Content-Style-Type" content="text/css">
6 <title></title>
7 <meta name="Generator" content="Cocoa HTML Writer">
8 <meta name="CocoaVersion" content="1038.25">
9 <style type="text/css">
10 p.p1 {margin: 0.0px 0.0px 0.0px 0.0px; font: 18.0px Helvetica}
11 p.p2 {margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica; min-height: 14.0px}
12 p.p3 {margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica}
13 p.p4 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #bf0000}
14 p.p5 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco}
15 p.p6 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; min-height: 12.0px}
16 p.p7 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #0000bf}
17 p.p8 {margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica; color: #0000ee}
18 span.s1 {color: #0000bf}
19 span.s2 {color: #000000}
20 span.s3 {color: #007300}
21 span.s4 {font: 12.0px Helvetica}
22 span.Apple-tab-span {white-space:pre}
23 </style>
24 </head>
25 <body>
26 <p class="p1"><b>Sequencing by a network of phrases</b></p>
27 <p class="p1"><b>Articulating notes with PmonoArtic</b></p>
28 <p class="p2"><br></p>
29 <p class="p3">Two for one here!</p>
30 <p class="p2"><br></p>
31 <p class="p3">Most conventional synthesizers have a mode where playing a note while the previous note is still sustaining slides from one note to the other. The <a href="../Patterns/PmonoArtic.html"><span class="s1">PmonoArtic</span></a> pattern does this based on the event's sustain value. The delta value is the number of beats until the next event; sustain is the number of beats until the note releases. If sustain is shorter than delta, the note should cut off early and the next event should produce a new synth.</p>
32 <p class="p2"><br></p>
33 <p class="p3">The example uses <a href="../Patterns/Pfsm.html"><span class="s1">Pfsm</span></a> (finite state machine) to arrange a set of predefined phrases in a partially randomized order. Each phrase is followed by a list pointing to the phrases that could legitimately follow the current phrase. That is, it might make musical sense to go from phrase 1 to phrase 2, but not from 1 to 3. Defining the successors for 1 appropriately makes sure that a nonsense transition will not be made.</p>
34 <p class="p2"><br></p>
35 <p class="p3">This is a long example, but it's only because there are lots of phrases. The structure is very simple: just a set of phrases chosen in succession by Pfsm.</p>
36 <p class="p2"><br></p>
37 <p class="p3"><b>Third-party extension alert:</b> In this example, the selection of the next phrase is explicitly weighted by repeating array elements, such as #[1, 1, 1, 1, 2, 2, 3, 3, 4, 4, 5]. A more elegant way to do this is using the <b>WeighBag</b> class in the MathLib quark.</p>
38 <p class="p2"><br></p>
39 <p class="p4">// the following are equivalent:</p>
40 <p class="p5">a = #[1, 1, 1, 1, 2, 2, 3, 3, 4, 4, 5];</p>
41 <p class="p5">({ a.choose } ! 100).histo(5, 1, 5);</p>
42 <p class="p6"><br></p>
43 <p class="p5">a = <span class="s1">WeighBag</span>.with((1..5), #[4, 2, 2, 2, 1]);</p>
44 <p class="p5">({ a.wchoose } ! 100).histo(5, 1, 5);</p>
45 <p class="p2"><br></p>
46 <p class="p3"><b>Example:</b></p>
47 <p class="p2"><br></p>
48 <p class="p5">(</p>
49 <p class="p4">// this SynthDef has a strong attack, emphasizing the articulation</p>
50 <p class="p7">SynthDef<span class="s2">(</span><span class="s3">\sawpulse</span><span class="s2">, { </span>|out, freq = 440, gate = 0.5, plfofreq = 6, mw = 0, ffreq = 2000, rq = 0.3, freqlag = 0.05, amp = 1|</p>
51 <p class="p5"><span class="Apple-tab-span"> </span><span class="s1">var</span> sig, plfo, fcurve;</p>
52 <p class="p5"><span class="Apple-tab-span"> </span>plfo = <span class="s1">SinOsc</span>.kr(plfofreq, mul:mw, add:1);</p>
53 <p class="p5"><span class="Apple-tab-span"> </span>freq = <span class="s1">Lag</span>.kr(freq, freqlag) * plfo;</p>
54 <p class="p5"><span class="Apple-tab-span"> </span>fcurve = <span class="s1">EnvGen</span>.kr(<span class="s1">Env</span>.adsr(0, 0.3, 0.1, 20), gate);</p>
55 <p class="p5"><span class="Apple-tab-span"> </span>fcurve = (fcurve - 1).madd(0.7, 1) * ffreq;</p>
56 <p class="p5"><span class="Apple-tab-span"> </span>sig = <span class="s1">Mix</span>.ar([<span class="s1">Pulse</span>.ar(freq, 0.9), <span class="s1">Saw</span>.ar(freq*1.007)]);</p>
57 <p class="p5"><span class="Apple-tab-span"> </span>sig = <span class="s1">RLPF</span>.ar(sig, fcurve, rq)</p>
58 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>* <span class="s1">EnvGen</span>.kr(<span class="s1">Env</span>.adsr(0.04, 0.2, 0.6, 0.1), gate, doneAction:2)</p>
59 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>* amp;</p>
60 <p class="p5"><span class="Apple-tab-span"> </span><span class="s1">Out</span>.ar(out, sig ! 2)</p>
61 <p class="p5">}).add;</p>
62 <p class="p5">)</p>
63 <p class="p6"><br></p>
64 <p class="p5">(</p>
65 <p class="p5"><span class="s1">TempoClock</span>.default.tempo = 128/60;</p>
66 <p class="p6"><br></p>
67 <p class="p4">// Pmul does only one thing here: take ~amp from each event</p>
68 <p class="p4">// and replace it with ~amp * 0.4</p>
69 <p class="p5">p = <span class="s1">Pmul</span>(<span class="s3">\amp</span>, 0.4, <span class="s1">Pfsm</span>([</p>
70 <p class="p4"><span class="s2"><span class="Apple-tab-span"> </span>#[0, 3, 1],<span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></span>// starting places</p>
71 <p class="p7"><span class="s2"><span class="Apple-tab-span"> </span></span>PmonoArtic<span class="s2">(</span><span class="s3">\sawpulse</span><span class="s2">,</span></p>
72 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\midinote</span>, <span class="s1">Pseq</span>([78, 81, 78, 76, 78, 76, 72, 71, 69, 66], 1),</p>
73 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\dur</span>, <span class="s1">Pseq</span>(#[0.25, 1.25, 0.25, 0.25, 0.25, 0.25, 0.25, 0.25, 0.25, 0.25], 1),</p>
74 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\sustain</span>, <span class="s1">Pseq</span>(#[0.3, 1.2, 0.3, 0.2, 0.3, 0.2, 0.3, 0.2, 0.3, 0.2],1 ),</p>
75 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\amp</span>, <span class="s1">Pseq</span>(#[1, 0.5, 0.75, 0.5, 0.75, 0.5, 0.75, 0.5, 0.75, 0.5], 1),</p>
76 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\mw</span>, <span class="s1">Pseq</span>([0, 0.03, <span class="s1">Pseq</span>(#[0], <span class="s1">inf</span>)], 1)</p>
77 <p class="p5"><span class="Apple-tab-span"> </span>), #[1, 2, 3, 4, 7],</p>
78 <p class="p6"><span class="Apple-tab-span"> </span></p>
79 <p class="p7"><span class="s2"><span class="Apple-tab-span"> </span></span>PmonoArtic<span class="s2">(</span><span class="s3">\sawpulse</span><span class="s2">,</span></p>
80 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\midinote</span>, <span class="s1">Pseq</span>([64, 66, 69, 71, 72, 73], 1),</p>
81 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\dur</span>, <span class="s1">Pseq</span>(#[0.25], 6),</p>
82 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\sustain</span>, <span class="s1">Pseq</span>(#[0.3, 0.2, 0.2, 0.2, 0.3, 0.2], 1),</p>
83 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\amp</span>, <span class="s1">Pseq</span>(#[1, 0.5, 0.5, 0.5, 0.5, 0.5], 1),</p>
84 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\mw</span>, 0</p>
85 <p class="p5"><span class="Apple-tab-span"> </span>), #[1, 1, 1, 1, 2, 2, 3, 3, 4, 4, 5],</p>
86 <p class="p6"><span class="Apple-tab-span"> </span></p>
87 <p class="p7"><span class="s2"><span class="Apple-tab-span"> </span></span>PmonoArtic<span class="s2">(</span><span class="s3">\sawpulse</span><span class="s2">,</span></p>
88 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\midinote</span>, <span class="s1">Pseq</span>([69, 71, 69, 66, 64, 69, 71, 69], 1),</p>
89 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\dur</span>, <span class="s1">Pseq</span>(#[0.125, 0.625, 0.25, 0.25, 0.25, 0.25, 0.25, 0.75], 1),</p>
90 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\sustain</span>, <span class="s1">Pseq</span>(#[0.2, 0.64, 0.2, 0.2, 0.2, 0.3, 0.3, 0.75], 1),</p>
91 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\amp</span>, <span class="s1">Pseq</span>(#[0.5, 0.75, 0.5, 0.5, 0.5, 1, 0.5, 0.5], 1),</p>
92 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\mw</span>, 0</p>
93 <p class="p5"><span class="Apple-tab-span"> </span>), #[0, 1, 1, 1, 1, 3, 3, 3, 3, 5],</p>
94 <p class="p6"><span class="Apple-tab-span"> </span></p>
95 <p class="p7"><span class="s2"><span class="Apple-tab-span"> </span></span>PmonoArtic<span class="s2">(</span><span class="s3">\sawpulse</span><span class="s2">,</span></p>
96 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\midinote</span>, <span class="s1">Pseq</span>([72, 73, 76, 72, 71, 69, 66, 71, 69], 1),</p>
97 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\dur</span>, <span class="s1">Pseq</span>(#[0.25, 0.25, 0.25, 0.083, 0.083, 0.084, 0.25, 0.25, 0.25], 1),</p>
98 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\sustain</span>, <span class="s1">Pseq</span>(#[0.3, 0.2, 0.2, 0.1, 0.07, 0.07, 0.2, 0.3, 0.2], 1),</p>
99 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\amp</span>, <span class="s1">Pseq</span>(#[1, 0.5, 0.5, 1, 0.3, 0.3, 0.75, 0.75, 0.5], 1),</p>
100 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\mw</span>, 0</p>
101 <p class="p5"><span class="Apple-tab-span"> </span>), #[1, 1, 1, 1, 3, 3, 4, 4, 4],</p>
102 <p class="p6"><span class="Apple-tab-span"> </span></p>
103 <p class="p7"><span class="s2"><span class="Apple-tab-span"> </span></span>PmonoArtic<span class="s2">(</span><span class="s3">\sawpulse</span><span class="s2">,</span></p>
104 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\midinote</span>, <span class="s1">Pseq</span>([64, 66, 69, 71, 72, 73, 71, 69, 66, 71, 69, 66, 64, 69], 1),</p>
105 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\dur</span>, <span class="s1">Pseq</span>(#[0.25, 0.25, 0.25, 0.25, 0.125, 0.375, 0.166, 0.166, 0.168,</p>
106 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>0.5, 0.166, 0.166, 0.168, 0.5], 1),</p>
107 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\sustain</span>, <span class="s1">Pseq</span>(#[0.3, 0.2, 0.2, 0.2, 0.14, 0.4, 0.2, 0.2, 0.2, 0.6, 0.2, 0.2, 0.2, 0.5],1),</p>
108 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\amp</span>, <span class="s1">Pseq</span>(#[0.5, 0.5, 0.6, 0.8, 1, 0.5, 0.5, 0.5, 0.5, 1,</p>
109 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>0.5, 0.5, 0.5, 0.45], 1),</p>
110 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\mw</span>, 0</p>
111 <p class="p5"><span class="Apple-tab-span"> </span>), #[0, 1, 1, 1, 1, 3, 3, 5],</p>
112 <p class="p6"><br></p>
113 <p class="p7"><span class="s2"><span class="Apple-tab-span"> </span></span>PmonoArtic<span class="s2">(</span><span class="s3">\sawpulse</span><span class="s2">,</span></p>
114 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\midinote</span>, <span class="s1">Pseq</span>([72, 73, 76, 78, 81, 78, 83, 81, 84, 85], 1),</p>
115 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\dur</span>, <span class="s1">Pseq</span>(#[0.25, 0.25, 0.25, 0.25, 0.5, 0.5, 0.5, 0.5, 0.125, 1.125], 1),</p>
116 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\sustain</span>, <span class="s1">Pseq</span>(#[0.3, 0.2, 0.2, 0.2, 0.95, 0.25, 0.95, 0.25, 0.2, 1.13], 1),</p>
117 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\amp</span>, <span class="s1">Pseq</span>(#[0.7, 0.5, 0.5, 0.5, 0.7, 0.5, 0.8, 0.5, 1, 0.5], 1),</p>
118 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\mw</span>, <span class="s1">Pseq</span>([<span class="s1">Pseq</span>(#[0], 9), 0.03], 1)</p>
119 <p class="p5"><span class="Apple-tab-span"> </span>), #[6, 6, 6, 8, 9, 10, 10, 10, 10, 11, 11, 13, 13],</p>
120 <p class="p6"><span class="Apple-tab-span"> </span></p>
121 <p class="p7"><span class="s2"><span class="Apple-tab-span"> </span></span>PmonoArtic<span class="s2">(</span><span class="s3">\sawpulse</span><span class="s2">,</span></p>
122 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\midinote</span>, <span class="s1">Pseq</span>([83, 81, 78, 83, 81, 78, 76, 72, 73, 78, 72, 72, 71], 1),</p>
123 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\dur</span>, <span class="s1">Pseq</span>(#[0.25, 0.25, 0.25, 0.25, 0.25, 0.25, 0.25, 0.25, 0.25, 0.25, 0.25,<span class="Apple-converted-space"> </span></p>
124 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>0.25, 2], 1),</p>
125 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\sustain</span>, <span class="s1">Pseq</span>(#[0.3, 0.3, 0.2, 0.3, 0.3, 0.3, 0.2, 0.3, 0.2, 0.3, 0.2, 0.3, 2], 1),</p>
126 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\amp</span>, <span class="s1">Pseq</span>(#[0.5, 0.5, 0.5, 0.8, 0.5, 0.5, 0.5, 0.8, 0.5, 0.8, 0.5,</p>
127 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>1, 0.4], 1),</p>
128 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\mw</span>, <span class="s1">Pseq</span>([<span class="s1">Pseq</span>([0], 12), 0.03], 1)</p>
129 <p class="p5"><span class="Apple-tab-span"> </span>), #[0, 7, 7, 7, 7, 7, 3, 3, 3, 3],</p>
130 <p class="p6"><span class="Apple-tab-span"> </span></p>
131 <p class="p7"><span class="s2"><span class="Apple-tab-span"> </span></span>PmonoArtic<span class="s2">(</span><span class="s3">\sawpulse</span><span class="s2">,</span></p>
132 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\midinote</span>, <span class="s1">Pseq</span>([69, 71, 72, 71, 69, 66, 64, 69, 71], 1),</p>
133 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\dur</span>, <span class="s1">Pseq</span>(#[0.25, 0.25, 0.25, 0.25, 0.166, 0.167, 0.167, 0.25, 0.25], 1),</p>
134 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\sustain</span>, <span class="s1">Pseq</span>(#[0.2, 0.2, 0.3, 0.2, 0.2, 0.2, 0.14, 0.3, 0.2], 1),</p>
135 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\amp</span>, <span class="s1">Pseq</span>(#[0.5, 0.5, 0.8, 0.5, 0.5, 0.5, 0.5, 0.8, 0.5], 1)</p>
136 <p class="p5"><span class="Apple-tab-span"> </span>), #[3, 3, 3, 4, 4, 5],</p>
137 <p class="p6"><span class="Apple-tab-span"> </span></p>
138 <p class="p7"><span class="s2"><span class="Apple-tab-span"> </span></span>PmonoArtic<span class="s2">(</span><span class="s3">\sawpulse</span><span class="s2">,</span></p>
139 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\midinote</span>, <span class="s1">Pseq</span>([84, 85, 84, 84, 88, 84, 83, 81, 83, 81, 78, 76, 81, 83], 1),</p>
140 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\dur</span>, <span class="s1">Pseq</span>(#[0.125, 0.535, 0.67, 1.92, 0.25, 0.166, 0.167, 0.167,<span class="Apple-converted-space"> </span></p>
141 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>0.25, 0.25, 0.25, 0.25, 0.25, 0.25], 1),</p>
142 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\sustain</span>, <span class="s1">Pseq</span>(#[0.2, 3.12, 0.2, 0.2, 0.2, 0.2, 0.2, 0.15, 0.3, 0.2, 0.2, 0.2,</p>
143 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>0.3, 0.2], 1),</p>
144 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\amp</span>, <span class="s1">Pseq</span>(#[1, 0.8, 0.8, 0.8, 1, 1, 0.8, 0.8, 1, 0.8, 0.8, 0.8,</p>
145 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>1, 0.8], 1),</p>
146 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\mw</span>, <span class="s1">Pseq</span>([0, 0.005, 0.005, 0.06, <span class="s1">Pseq</span>(#[0], 10)], 1)</p>
147 <p class="p5"><span class="Apple-tab-span"> </span>), #[10, 10, 10, 11, 11, 11, 11, 12, 12, 12],</p>
148 <p class="p6"><span class="Apple-tab-span"> </span></p>
149 <p class="p4"><span class="s2"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></span>// same as #4, 8va</p>
150 <p class="p7"><span class="s2"><span class="Apple-tab-span"> </span></span>PmonoArtic<span class="s2">(</span><span class="s3">\sawpulse</span><span class="s2">,</span></p>
151 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\midinote</span>, <span class="s1">Pseq</span>(([64, 66, 69, 71, 72, 73, 71, 69, 66, 71, 69, 66, 64, 69]+12), 1),</p>
152 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\dur</span>, <span class="s1">Pseq</span>(#[0.25, 0.25, 0.25, 0.25, 0.125, 0.375, 0.166, 0.166, 0.168,</p>
153 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>0.5, 0.166, 0.166, 0.168, 0.5], 1),</p>
154 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\sustain</span>, <span class="s1">Pseq</span>(#[0.3, 0.2, 0.2, 0.2, 0.14, 0.4, 0.2, 0.2, 0.2, 0.6, 0.2, 0.2, 0.2, 0.5],1),</p>
155 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\amp</span>, <span class="s1">Pseq</span>(#[0.5, 0.5, 0.6, 0.8, 1, 0.5, 0.5, 0.5, 0.5, 1,</p>
156 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>0.5, 0.5, 0.5, 0.45], 1),</p>
157 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\mw</span>, 0</p>
158 <p class="p5"><span class="Apple-tab-span"> </span>), #[11, 11, 11, 11, 11, 12, 12],</p>
159 <p class="p6"><br></p>
160 <p class="p7"><span class="s2"><span class="Apple-tab-span"> </span></span>PmonoArtic<span class="s2">(</span><span class="s3">\sawpulse</span><span class="s2">,</span></p>
161 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\midinote</span>, <span class="s1">Pseq</span>([81, 84, 83, 81, 78, 76, 81, 83], 1),</p>
162 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\dur</span>, <span class="s1">Pseq</span>(#[0.25], 8),</p>
163 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\sustain</span>, <span class="s1">Pseq</span>(#[0.2, 0.3, 0.3, 0.2, 0.3, 0.2, 0.3, 0.2], 1),</p>
164 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\amp</span>, <span class="s1">Pseq</span>(#[0.5, 1, 0.5, 0.5, 0.6, 0.5, 0.8, 0.5], 1),</p>
165 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\mw</span>, 0</p>
166 <p class="p5"><span class="Apple-tab-span"> </span>), #[0, 9, 9, 11, 11, 12, 12, 12, 12, 12],</p>
167 <p class="p6"><span class="Apple-tab-span"> </span></p>
168 <p class="p4"><span class="s2"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></span>// same as #1, 8va</p>
169 <p class="p7"><span class="s2"><span class="Apple-tab-span"> </span></span>PmonoArtic<span class="s2">(</span><span class="s3">\sawpulse</span><span class="s2">,</span></p>
170 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\midinote</span>, <span class="s1">Pseq</span>(([64, 66, 69, 71, 72, 73]+12), 1),</p>
171 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\dur</span>, <span class="s1">Pseq</span>(#[0.25], 6),</p>
172 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\sustain</span>, <span class="s1">Pseq</span>(#[0.3, 0.2, 0.2, 0.2, 0.3, 0.2], 1),</p>
173 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\amp</span>, <span class="s1">Pseq</span>(#[1, 0.5, 0.5, 0.5, 0.5, 0.5], 1),</p>
174 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\mw</span>, 0</p>
175 <p class="p5"><span class="Apple-tab-span"> </span>), #[6, 6, 8, 9, 9, 9, 9, 10, 10, 10, 10, 13, 13, 13],</p>
176 <p class="p6"><span class="Apple-tab-span"> </span></p>
177 <p class="p7"><span class="s2"><span class="Apple-tab-span"> </span></span>PmonoArtic<span class="s2">(</span><span class="s3">\sawpulse</span><span class="s2">,</span></p>
178 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\midinote</span>, <span class="s1">Pseq</span>([78, 81, 83, 78, 83, 84, 78, 84, 85], 1),</p>
179 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\dur</span>, <span class="s1">Pseq</span>(#[0.25, 0.25, 0.5, 0.25, 0.25, 0.5, 0.25, 0.25, 1.75], 1),</p>
180 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\sustain</span>, <span class="s1">Pseq</span>(#[0.2, 0.3, 0.2, 0.2, 0.3, 0.2, 0.2, 0.3, 1.75], 1),</p>
181 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\amp</span>, <span class="s1">Pseq</span>(#[0.4, 0.8, 0.5, 0.4, 0.8, 0.5, 0.4, 1, 0.8], 1),</p>
182 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\mw</span>, <span class="s1">Pseq</span>([<span class="s1">Pseq</span>([0], 8), 0.03], 1)</p>
183 <p class="p5"><span class="Apple-tab-span"> </span>), #[8, 13, 13],</p>
184 <p class="p6"><span class="Apple-tab-span"> </span></p>
185 <p class="p7"><span class="s2"><span class="Apple-tab-span"> </span></span>PmonoArtic<span class="s2">(</span><span class="s3">\sawpulse</span><span class="s2">,<span class="Apple-converted-space"> </span></span></p>
186 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\midinote</span>, <span class="s1">Pseq</span>([88, 84, 83, 81, 83, 81, 78, 76, 81, 83], 1),</p>
187 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\dur</span>, <span class="s1">Pseq</span>(#[0.25, 0.166, 0.167, 0.167,<span class="Apple-converted-space"> </span></p>
188 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>0.25, 0.25, 0.25, 0.25, 0.25, 0.25], 1),</p>
189 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\sustain</span>, <span class="s1">Pseq</span>(#[0.2, 0.2, 0.2, 0.15, 0.3, 0.2, 0.2, 0.2,</p>
190 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>0.3, 0.2], 1),</p>
191 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\amp</span>, <span class="s1">Pseq</span>(#[1, 1, 0.8, 0.8, 1, 0.8, 0.8, 0.8,</p>
192 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>1, 0.8], 1),</p>
193 <p class="p5"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s3">\mw</span>, 0</p>
194 <p class="p5"><span class="Apple-tab-span"> </span>), #[10]</p>
195 <p class="p5">], <span class="s1">inf</span>)).play;</p>
196 <p class="p5">)</p>
197 <p class="p6"><br></p>
198 <p class="p5">p.stop;</p>
199 <p class="p2"><br></p>
200 <p class="p2"><br></p>
201 <p class="p8"><span class="s2">Previous:<span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><a href="PG_Cookbook05_Using_Samples.html"><span class="s4">PG_Cookbook05_Using_Samples</span></a></span></p>
202 <p class="p8"><span class="s2">Next:<span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><a href="PG_Cookbook07_Rhythmic_Variations.html"><span class="s4">PG_Cookbook07_Rhythmic_Variations</span></a></span></p>
203 </body>
204 </html>